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Abstract. Under the extension of Curry-Howard's correspondence to 
classical logic, Gentzen's NK and LK systems can be seen as syntax- 
directed systems of simple types respectively for Parigot's A/^-calculus 
and Curien-Herbelin's A/i/x-calculus. We aim at showing their compu- 
tational equivalence. We define translations between these calculi. We 
prove simulation theorems for an undirected evaluation as well as for 
call-by-name and call-by-value evaluations. 



1 Introduction 

Key systems for classical logic in proof theory are Gentzen's NK and LK. The log- 
ical equivalence between the latter was proved in Gentzen, 1934| . We deal with 



the extension of Curry-Howard's correspondence between proofs and programs 
through the systems of simple types for the Xfi and A/x/i-calculi. This extension 
concerns some other calculi. It is initially Felleisen's Ac-calculus. Its type system 
is the intuitionistic natural deduction with the double negation axiom. GrifHn 
proposed this axiom as the type for the c-operator in [GrifEn, 1990| . However, 
we focus on calculi that correspond closer to Gentzen's systems. The A^-calculus 
was defined for NK in [Parigot, 1992] . The A^/2-calculus was designed for LK in 
jCurien and HerbeHn, 2000] . In the general case, these two calcuH are not deter- 
ministic. There exists critical pairs. The A/x/i-calculus admits two deterministic 
projections depending on choosing one of the two possible symmetric orientations 
of a critical pair. They correspond to the call-by-name/call- by- value duality. 

We aim at proving the computational equivalence between A/i and A/i/i- 
calculi. A major step was reached with the proof of the simulation of the A/z- 
calculus by the A/Z/Et-calculus in [Curien and Herbelin, 2000] . It holds both for 
call-by-name and call- by- value evaluations. We present the call- by-name/call- 
by-value projections of the A/i-calculus in the same way as for the A/i/i in 
jCurien and HerbeHn, 2000] . It consists of choosing one of the two possible 
orientations of a critical pair. We prove that the A/i-calculus simulates back- 
wards the A/i/i-calculus in such a way that we obtain easily the same result 
for the call-by-name, for the call-by-value and for the simple type case. The 
A/i/i-calculus is composed of three syntactic categories: terms, contexts (or envi- 
ronments) and commands. The A/i-calculus is basically composed of terms and 



commands. We add contexts to the A^-calculus. It eases mappings between the 
A/i and A^/i-calcuh. We extend the translation from the A^-calculus to the Xfj,fl- 
calculus defined in jCurien and Herbelin, 2000] over the A/x-contexts. We define 
backwards a translation from the A/i/i-calculus to the A/i-calculus. 

In section [2] we present the A/i-calculus. In section [3] we present the A/i/x- 
calculus. In section|4]we define translations between these two calcuH. In section 
[Uwe prove simulation theorems that hold for call-by-name and call-by- value. 

2 A^i-calculus 

We follow the definition given in [Parigot, 1992| . Firstly, we present the gram- 
mar of terms and commands. Secondly, we present the system of simple types. 
Thirdly, we present generic reductions and their call-by-name and call-by-value 
projections. Fourthly, we extend both the grammar and the type system to the 
contexts. 

Basically, the A/i-calculus is composed of terms and commands. They are 
defined by mutual induction: 

t ::= X I \x.t I (t)t\ /ia.c c ::— \o\t 

Symbols x range over A-variables, symbols a range over /^-variables. We note 
a; € t or a e i the fact that a; or a has a free occurrence in t. Symbols A and [i 
are binders. Two terms are equal modulo a-equivalence. 

The system of simple types for the A/i-calculus is based on two kinds of 
sequents. The first rVt:T\ A concerns the terms and the second c : (-T h Z\) 
concerns the commands in which T is a simple type obtained by the grammar 
T ::= X I T — > r, 7^ is a finite domain application from A-variables to simple 
types and Zi is a finite domain application from /x- variables to simple types. F' 
denotes the union of the applications F and F' . System rules are: 

rhtiB I A rVu-.A^B I A r'hv.A I A' 

I r\{x:A}^\x.t:A-*B I A r.r'^(u)v:B \ A,A' ^*'' 

r^t:A I A c-\rhA) 
\a\t:{r^ A,a:A) Fhiia.c-.A \ A\{a:A} 

The restriction (*) requires that F and F' match each other on the intersection 
of their domains. This holds for A and Z\' too. 

The category of contexts is introduced in order to ease comparisons with the 
homonymous category of the A/x/i-calculus. A/i-contexts are defined by mutual 
induction with the terms: 

e ::= a \ P{t) \ t ■ e 

We can see contexts as commands with a hole to fill. The first construction a 
expects a term t in order to provide the command [a] t. The second f3{t) expects 
a term u in order to provide the command [f3] (t) u. The last t ■ h puts the term 
f on a stack and expects another term to fill the hole. 



Definition 1. Let t a term and e a context. The command e{t} is defined by 
induction on e: 

[a\t if e = a 
if e 



'At] 



3] (u) t if e = /3(u) 
h{{t) u} \f e = u - h 



The type system is extended to another kind of sequents F \ e : T \- A. The 
typing rules give the context e the type of the term t that fills the hole of e: 



a:A\-a:A 



r\-t:{A^B) I A 



r\-t:A I A 



r' I e:BhA' 



r I P{t):AhAJ-):B r,r' \ t-e:{A^B)hA,A' 

A sequent calculus like cut-rule can then be derived in this system as a term 
against context application. 

rhf.A \ A r' \ e:A\-A' 



Lemma 1 . The rule ■ 



Proof. By induction on e. 



e{t}:(r,r'\-A,A') 



holds in Xfj.. 



rhf.A I A 

- if e = a then e{t} = [a] t and [a]t:ir\-A,a:A) 



if e = P{u) then e{t} = [/3] {u) t and 



r\-u:(A^B) I A 



r'\-t:A I A' 



r,r'\-{u)t:B I A,A' 
[0] {u)t:{r,r'\-A,A',l3:B) 

- if e = u - h then e{t} = h{{t) u} and 

r\-t:{A^B) I A r'\-u:A \ A' 



r,r'\-{t)u:B I A, A' 



r" I h:B\-A" 



ind. hyp. 



h{(t)u}:(r,r' ,r"hA,A' ,A") 

Definition 2. Let t a term, e a context and a a ji-variahle, The term t[a e] 
- the substitution of a by e in t - is defined by induction on t: 



t[a 



e = < 



c[a ' 



X \f t = X 

Xx.u[a ^ e] if t = Xx.u 

{u[a <— e]) v[a <— e] if t = (u) v 

_/u/?.c[a <— e] \ft = iJ,(3.c 

j e{t[a ^ e]} \fc=[a]t 
'"|[/3]i[a^e] \fc=[P]t 



The computation notion is based on reductions. We remind one-step reduc- 
tion rules: 



{Xx.u) t — »/3 u[x <— t] 
fiS.[S]t^0t{\f S^t) 



{fxa.c) t -^^ /xa.c[a <— t • a] 
{t) fxa.c -^^1 iJ,a.c[a ^ o:{t)] 
[f3] fia.c -^p c[a ^ P] 



The reduction — >^ stands for the reflexive and transitive closure of — and the 
reduction ^ stands for the union of for 7 G {/3, /i, fj.' , p, 6}. 

Some of these reductions are Unear. Both of the p and 0-reductions are Unear 
because they correspond to the identity in NK. The /3-reduction from the term 
(Xx.t) y is Unear because it consists of replacing a variable by another variable 
inside a term. It corresponds to a normaHsation against an axiom rule in NK. 
The /3-reduction from the term (Xx.t) u where x has a single free occurrence in t 
is linear too because it consists either of substituting a single variable occurrence 
by any term. It corresponds either to a normalisation without a proof-tree branch 
duplication. 

Reductions , and have the same meanings as in the general 

case. The relation « is deflned as the reflexive, transitive and symmetric closure 
of . 

There exists a critical pair for computation determinism. Applicative terms 
[Xx.t) p,p.d and {pa.c) pP.d can be /? or /^.'-rewritten in the first case and p, or 
/z'-rewritten in the second case. We can see the call-by-name and call-by-value 
discipHnes as restrictions of the generic reductions. 

The call-by-name evaluation consists of allowing every reduction but the p'- 
rule. The /3-reduction holds in the first case and the /z-reduction in the second. 
Formally the call-by-name reduction is — = ^ \ -^^j.' ■ 

The call-by-value evaluation consists of prohibiting and /^-reductions in 
which the argument is a /^-abstraction. Formally we define a subset of terms 
called values by this grammar: v ::— x \ Xx.t. /3„ and /(^-reductions are defined 
instead of generic (3 and p ones: 

(Xx.u) V u[x ^ v] (pa.c) V pa.c[a ^ v ■ a] 

The call-by-value reduction -^y is the union of for 7 g {Pv, pv, p' , p,9}. 
Critical pairs are then /i'-rewritten. 

There is another way to define call-by- value into the A/i-calculus. The solution 
is detailed in |Ong and Stewart, 1997| . It consists of restricting the p'-ru\e to 
values instead of the p: 

(v) pa.c^^i^ pa.c[a *— a{v)] 

Formally becomes the union of for 7 G {Pv, p, p'^, p,6}. In fact terms 
(Xx.t) pa. c and [pa.c) pa' .c' are respectively p' and /i-reduced because pa.c is 
not a value in these cases. However, we follow Curien-Herbelin's call-by-value 
definition. 

We finish this section by a lemma. It is useful for the section [5] simulation 
theorems. Any command of the form e{pa.c} is a redex. However, some can not 
be reduced in call-by-name nor in call-by- value. 

Lemma 2. e{pa.c} ^ c[a ^ e] 



Proof. By induction on e. 



ii e — (3 then ej/ia.c} = /la.c c[a <— /3] 

if e = /3(t) then 

ej/xa.c} = [P] (t) fj,a.c 

[(3] fj,a.c[a «- a{t)] 
c[a ^ a{t)][a ^ j3] 



— \{ e — t ■ h then 



e{/ia.c} = h{{^a.c)t} 

— s-p ft,{/iQ;.c[a ^ t ■ a]} 



c[a t ■ a][a ^ h] 
= c[a ^ t ■ h] 

This lemma does not hold in call-by-name for the I3{t) induction case because 
no /i'-rule is allowed. It holds in call-by- value if t is a value for the h ■ t induction 
case. 



3 A^i/i-calculus 

The A/i/i-calculus has the same relation against LK as the A/i-calculus against 
NK. Reductions of A/i/i-calculus correspond to the cut elimination steps in LK 
as well as the A/x- reductions correspond to the NK-normalisation. We follow the 
definition given in [Curien and Herbelin, 2000] . Firstly, we present the grammar 
of the A/i/i-calculus. Secondly, we present the simple type system. Thirdly, we 
present generic reductions and their call-by-name and call-by-value projections. 

The A/i/i-calculus is basically composed of terms, commands and context^^. 
They are defined by mutual induction: 

t ::= X I Xx.t I /ia.c c ::~ 6 ::— a \ t ■ e \ flx.c 

As in the A/i, symbols x range over A-variables, symbols a range over /i-variables 
and symbols A, /t and /z are binders. Terms are equal modulo a-equivalence. 

This calculus symmetry looks like LK's left /right symmetry. It is confirmed 
by its system of simple types. This system shares types with the A/i-calculus. It 
shares the same kinds of sequents too. Its rules are: 

r\-t:B I A rht-.A \ A r' \ e-.BhA' 

x:A\-x:A I I a:A\-a:A , rT"^ —. :r-; — — '. : '*) 



r\{x:A}\-Xx.t:A^B \ A r,r' I t-e:A^B\-A,A' 

c:ir\-A) c:{r\-A) rht:A \ A r' I e:AhA' 



r\-fia.c:A \ A\{a:A} r\{x:A} \ fix.c-.AhA {t\e):(,r,r'\-A,A') 



(*) 



^ In [Dougherty et al., 2004| these are referred to respectively callers, callees and cap- 
sules. We kept the terminology in [Curien and Herbelin, 2000| that sounds closer to 
its meaning: terms are programs, contexts are environments and commands represent 
"a closed system containing both the program and its environment". 



The restriction (*) is the same as that of A^. 

We present one-step reduction rules. Substitutions inside the A/x/i-calculus 
are supposed to be known. Each rule concerns a command but the 6'-rule: 

{Xx.u \ t • e) -^fj {t I jlx.{u I e)) {^.a.c \ e) c[a ^ e] 
fiS.{t \ 6) ~*e t {6 ^ t) {t I fix.c) -^f, c[x ^ t] 

H and /i-reductions are duals of each other. They correspond to the structural 
rules in LK. Reductions — >^ and have the same meanings as in the A/i- 

calculus. The /3-rule is a mere term modification without term duplication. It 
is therefore a linear reduction. The 6'-reduction is linear too. There is no p- 
reduction. It is a /i-rule particular case in which e = fi. 

This system is not deterministic. There is a single critical pair {pa.c \ jlx.d). 
It can be both /x or /i-rewritten so that Church-Rosser's property does not hold. 
In fact {iJ,a.{x \ y ■ a) \ jlx.{z \ x ■ (3)) is /i-rewritten as {x\y • fix.{z \ x ■ (3)) and is 
/i-rewritten as {z \ iia.{x \ y ■ a) ■ (3). These are two different normal forms. 

Call-by-name and call-by- value discipHnes still deal with this problem. They 
both consist of restricting the context construction. The first new grammar is 
called A/z/ip and the second is called Xfifiq- 

The call-by-name evaluation consists of restricting the /x-rule to a subset of 
contexts that are called stacks. A/x/ij^-grammar is: 

t ::— X I Xx.t I /ia.c c ::= | e) s ::— a\t-s e ::= s \ fix.c 

The /i„-rule is restricted to the stacks: 

{pa.c I s) — >;^„ c[a ^ s] 

Call- by-name reduction A„ is the union of -^-y for 7 £ {/3, /i„, fl, 9}. The critical 
pair can then only be /i-rewritten. This reduction was proved confiuent and 
stable in the A/x/t^-calculus in [Curien and Herbelin, 2000] . 

The call-by- value oriented grammar consists of allowing the t ■ e context con- 
struction only for values. A^/tg-grammar is: 

t ::= X I Xx.t I fia.c v ::— x \ Xx.t c ::~ {t\e) e ::— a | w • e | fix.c 

The /tu-rule is restricted to values: 

{v I ilx.c) ">/i^ c[x ^ v] 

Call-by-value reduction is the union of for 7 g {P, ^, (1^,9}. The com- 
mand (/ia.c I /xa'.c') can then only be /i-rewritten. This reduction was proved 
confiuent and stable in the A/i/tg-calculus in [Curien and Herbelin, 2000] . 
The /3'-rule contracts as shortcut for both a linear /3-rule and a /i-rule: 

{Xx.u \ t ■ e) ^13' {u[x ^ t]\e) 

This /3'-rule is obviously compatible with the call-by-name evaluation. It is also 
compatible with the call-by- value because t is a. value by definition of XfijiQ. 



4 Translations between Xfi and A/x/i-calculi 



We define a translation ( )t from Xfi to A/i/i. It extends that of Curien-Herbelin 
to the A^-contexts. We define backwards a translation ( )° from A^/2 to A^. We 
prove properties about their compatibilities with the simple type system and 
about their compositions. 

Definition 3. Application ( )^ maps any X^-term t, command c and context e 
respectively to a Xfiji-term, command and context. ( )t is defined by induction 
on t, c and e: 



it 



X \f t = X 

Xx.u^ \f t — Xx.u 

^l|3.{v^fiy.{u^\y■ P)) if t - (u) t- (*) 



if t = iia.c 



ct = [a] it = (tt I a) 

a if e = a 

M2/.(it|y./3) ife = /3(t) 
it . ft.t \f e = t-h 



Condition (★) requires that variables y and have no free occurrence in u neither 
in V. Condition {-k-*) requires that y ^ t. A straightforward induction leads us to 
state that i and it have the same free variables set. 

It seems more natural to translate (u) v by fif3.{u'' ■ f3). This shorter term 
corresponds in LK to the arrow elimination rule in NK too. But it would not 
be compatible with the call-by-value evaluation. For example, (x) ^a.c would be 
translated as fj,l3.{x \ /ia.ct • (3) in this case. It can not be reduced by any rule in 
the A^/2-calculus. However, {x) fxa.c can be /i'-reduced in the A/^-calculus. 

{u)v should be translated as fi(3.{u^ ily.{v^ \ p,x.{y \ x ■ (3))) with Ong and 
Stewart's call-by-value definition in |Qng and Stewart, 1997| . 

We show that translation ( )t is compatible with the type system. If a typing 
environment for a term i exists, it holds for it. 



Lemma 3. T h t : A \ A 



rht'' :A \ A 



Proof. By a straightforward induction on i. We show the less than obvious cases. 
— if i = (u) V then it — fi(3. (wt | . ^^t | y . ^ and 



y.Ahy.A | 



l3:Bhl3:B 



r\-u^:A^B I A 



y.A I yl3:(A^B)hfJ:B 



r'hw+:A I A' 



{u^ \yl3):{r,y:AhA,f3:B) 
r I f,y.{u'^ \ yl3)hA,l3:B 



{v^ I ily.ju^- I yf3)):ir,r'hA,A\f3:B) 
r,r'\-fil3.{v'i \iiy.(u'< \ yl3)):B\ A, A' 



if e = l3{t) then = P'U-it^ I ?/ ' /?) and 



y.Ahy.A I I P:B\-I3:B 

rht+:(A->B) I Zi y.A \ y I3:{A^B)\- I3:B 

{t^ \ vP):ir,yAhA,l3:B) 
r I fiy.it'' \yl3)-AhA,l3:B 

Definition 4. Application ( )° maps backwards any Xfifi-term t to a Xfi-term. 
Definition [7] is used to translate any X^fl-command c. Definition of the A/i- 
contexts is used to map the Xfifi-contexts e as well. ( )° is built by induction on 
t, c and e: 

{X \f t = X 

Xx.u° \f t = Xx.u 
fia.c° \f t = ^a.c 

c° = {t\e)° ^e°{t°} 

a if e = a 

t° -h" \f e = t-h 

(3{Xx.^S.c°) if e = jlx.c (*) 

Condition (*) requires that S ^ c. t and t° have the same free variables set. 
AppHcation ( )° is compatible with the type system too. 

Lemma 4. T h t : A \ A =^ r h t° : A \ A 

Proof. By a straightforward induction on t. We give two cases. 

- if c = (i I e) then c° = e°{t°} and 

r\-t:A \ A r' \ e:Al-A' ° r\-t°:A \ A F' \ e°:AhA' 



(t I e):{r,r'\-A,A') e° {t°}:{r,r'hA,A') 

if e = jlx.c then e° = (3{Xx.^5.c°) and 

c°:{rhA) 

c:{r^A) ° r\-fiS.c°:B I A 



lem.[T] 



r\{x:A} I p,x.c:A\-A r\{x:A}\-\x.tiS.c'':(A^B) 



r\{x:A} I f3{Xx.ti5.c°):A\-A,f3:B 



We focus on properties about the composition of ( )^ and ( )°. We want to 
state that t^" = t and that — t for any term. But it is not the case, these 
results hold modulo Hnear reductions. 

Theorem 1. tt° ^ t 



Proof. By a straightforward induction on t. Every cases is obtained successively 
by expanding definitions [U [H [4] and by applying the induction hypothesis. We 
give the case which uses linear reductions additionally. 



— ii t = (u) V then 







(wt \fly.{u'' 






M/3 


[7] iXy.fi6.[f. 


;](wt°)y)„to 






[7] iXy.^i5.[^^ 


;] (m) y) V 






[7]m5.[/3] (ti 


V 




fi(3 








{u) 


V 





We prove two lemmas before stating backwards that ( )° is the identity 
modulo linear reductions. The first lemma is useful to prove the second. 

Lemma 5. (toil • ■ • I e) (^o^ | ^i^ • ■ • ■ • ■ e) 
Proof. By induction on n. 

— if n = then it is obvious 

— if 71 = m + 1 then 

{toil . . .trnUn+l'' \e) = {^P .{tm+l'' \ fty -{toh . . . tm'' \ y ■ P)) \ e) 

{tm+l'^ \ tJ-y-{totl ■ ■ -trn^ \y ■ e)) 

{tah ■ ■ -Un \tm+i^ ■ e) 

(to^ I ^1^ • ■ • ■ • ^m^ • • e) 

The second lemma shows how to map a definition [T] command. 
Liemma o. 

Proof. By induction on e. 

— if e = a then it is obvious by definitions [T] and [3] 

— if e = I3(u) then 

= if^i-it'' Ifj-y-iu'' \y ■ 

{t^\fiy.{u^\yP)) 

— if e — u ■ h then 

u-h{t}'' = h{{t)u}'' 

(tt|Mt./it) 
= {t^U-h^) 

Theorem 2. t°'< t 

Proof. By induction on t. We apply definitions[3l|4]successively and the induction 
hypothesis. We give a typical case and another which needs either the previous 
lemma or linear reductions. 



— if c = I e) then 

{t\e)°^ = e°{t°}^ 
^ (t°+|e°t) 

^ {t\e) 

— if e = jlx.c then 

flx.c°^ = P{\x.nl3.c°)^ 

= /xy.(Ax.M/3.c°t|y./3) 

ij-y-{^x.^i(3.c\y (3) 

^0 P'y-{y\fix.{iJ,i3.c\p)) 

-^ji jlx.{ii[3.c\l3) 
-^n jix.c 

5 Simulations between X/x and A/Lt/i-calculi 

We want to prove that the A/i-calcukis simulates and is simulated backwards 
by the A/z/x-calculus. We focus on the undirected evaluation. Call-by-name and 
call-by-value are drawn from this. 

We begin with the simulation of the A/;, by the A/i/i. The next four lemmas 
show results of a A/^-substitution after a f3, jjL, ji' and p-reduction. Each proof 
consists successively of 

— expanding the A/i-substitution 

— expanding the definition of ( )^ 

— applying the induction hypothesis if necessary 

— factorising the A/x/i-substitution 

— factorising the definition of ( )^ 

We give basic cases and those which use lemmas additionally for any proof. 
Lemma 7. t[x <— = t^[a; <— u^] 
Proof. By induction on t. 

— \it = x then x[x ^ u]^ = = x^x 

— lit = y then y[x <— u]^ = y = <— v)] 

— \it = {v)'w then 

{v) w[x <— = {v[x ^ u\) w[x ^ u]^ 

= iJ.p.{w[x <— u]^ 1 jly.{v[x ^ v]^ I y ■ (3)) 
= iJ.f3.{w^x ^ u''] I jly.{v'^[x ^u^\y /3)) 
= IJ./3-{w^ I fiy.{v^ \y 0))[x^ 
= (f) w''[x <— 

Lemma 8. t[a <— u ■ a]^ 'i- t^[a <— • a] 



Proof. By induction on t. 



ii t = (a) b then 
(a) b[a <— u 



= {a[a ^ u ■ a\) h[a ^ u ■ 

= iip.{b[a ^ u ■ a]^ j fly.{a[a <— u ■ a]^ \ y • j3)) 

/x/3.(6^[a ^ • q;] I jly.[a^[a ^ ■ a\\y ■ /?)) 

= M/3-(&^lA2/-(at|2/-/3))[a 
= (a) 6^ [a*^ ■ a] 



■ a\ 



if c = [a] w then 



[a] wla <— w • a]^ = [a] 



w a 



u ■ a\ 



u ■ a{w[a <— u ■ a]}^ 
{w[a ^ u ■ a]^ \ u'^ ■ a) 
{w^ [a ^ ■ a]\u^ ■ a) 
{w^ I a) [a ^ • a] 
[a] [a <— ■ a] 



Lemma 9. t[a ^ a{u)]^ t^[a ^ jiy.{y\y ■ a)]u^ 
Proof. By induction on t. 
— if t = (a) 6 then 

(o) 6[a <— a(w)]^ = {a[a ^ a{u)]) b[a -i^ a{u)]^ 



11/3. {b[a ^ ct{u)]^ I fiy.{a[a ^ a{u)]^ \ y ■ P)) 

Iil3.{h^[a ^ fiy.{u^\y a)] \ ij.y.{a^[a 4- fiy.{u^\y-a)] |y •/?)) 

I jly.{d^ I y • /3))[a ^ jj.y.{u^ \y ■ ol)\ 
(a) b\a ^ fiy.{u^ \ ya)] 



if C: 



[a] w then 

[a] w[a <— cx{u)]^ 



Lemma 10. t[a ^ l3]^ = t^[a 
Proof. By induction on t. 
— if c = [a] M then 



* 



/3] 



a] {w[a <— a{u)]) u' 

{w[a ^ ce{u)]) u' \ a) 

w[a <— a(u)]^ \ ■ a) 

w^a ^ jj-y-iu^ I y ■ a)] \ • a) 

w'^ \ a)[a ^ ij.y.{u^ \ y ■ a)] 

a] w^a *— fly.{u^ \ y ■ a)] 



[a] u[a ^ (3]^ = [f3] u[a ^ /3]^ 

= (wt |a)[a ^ /3] 
= [a]u'[a ^ 0] 



Theorem 3 (simulation of the A/i-calculus by the A/i/i-calculus) . 

t V =^ 3u ^ u A f ^ u 

Proof. By cases on 7. 
— if 7 = /? then 

{Xx.u)v'' — fj,f3.{v^ \ jly.{Xx.u^ \ y ■ P)) 
^13 fJ-f3-{v'' \fj.y.{y\flx.{u^ \(3))) 
t,p.{v^\ilx.{u^\P)) 
^xl3.{u'^[x^v^\|3) 

[x U^] 
it 



if 7 = then 



— if 7 = /i' then 



u\x 



{fia.c)v^ = fiP.{v^fLy.{na.c''\y(3)) 
^p, fia.{fia.c' \v'' ■ a) 
-^^ IJLa.c^[a ^ v'^ ■ a] 



{v)iiaJ = fj,(3.{fia.c^ \fly.{v'' \ y ■ P)) 



— if 7 = p then 



I /ia.c^ = (/ia.c^ I (3) 

[a ^ /3] 
= c[a /3]^ 



- if 7 = 61 then ^i5.[5] ^ nS.{t'< \ S) -^g 

Corollary 1 (call-by-name case). => Elu A„ u A u 

Proof. By cases on (3 and ^-rules. 

(Xx.u) V is /3-reduced in call-by-name without any restriction. It is simulated 
in the A///i-calculus by a /x-reduction. The latter is in call-by-name without any 
restriction too. 

(lia.c) V is /z-reduced in call-by-name without any restriction. It is simulated 
in the A/x/i-calculus by a /i-reduction. The latter is in call-by-name if • a is a 
stack. It is the case by definition [51 

Corollary 2 (call-by- value case), i — >i, w But^^yU A u 



Proof. By cases on ^ and /i'-rules. 

(Ax.u) V is /3-reduced in call-by- value if w is a value. It is simulated in the 
A/x/i-calculus by a /i-reduction. The latter is in call-by-value if v'^ is a value. It 
is the case by the definition of A/z/Xq . 

(/ua.c) V is /i- reduced in call-by- value if u is a value. It is simulated in the Xjijl- 
calculus by a /x-reduction. The latter is in call-by-value without any restriction. 

{v) ^a.c is /Lt'-reduced in call-by- value without any restriction. It is simulated 
in the A/x/i-calculus by a /U-reduction. The latter is in call-by-value without any 
restriction as well. 

The A/u/i-simulation by the A/z-calculus requires preliminary lemmas showing 
that ( )° commutes over Xfi and A/i/i-substitutions. Each proof consists of 

— expanding the A/i/i-substitution 

— expanding the definition of ( )° 

— applying the induction hypothesis if necessary 

— factorising the A/i-substitution 

— factorising the definition of ( )° 

Lemma 11. t[x ^— u]° =t°[x<— u°] 
Proof. By induction on t. 

— if t = X then x[x <— u]° = u° = x°[x u°] 

— if t = y then y[x <— u]° = y = y°[x <— u°] 

— ift={t\e) then 



{t I e)[x <— u]° = {t[x ^ u] I e[x <— u])° 

r 1° rj.r i^t 



= e[x <— M]°{t[a; ^ u]°} 
= e°[x ^ u°]{t°[x ^ u°]} 
= e°{t°}[x^u°] 
= {t\e}°[x^u°] 



Lemma 12. t[a ^ h\° = t°[a ^ h°] 



Proof. By induction on t. 



if c 



{t I e) then 



{t\e)[a 



h]° = {t[a ^ h] I e[a ^ 
= e[a <— ft,]°{t[Q; 
= e°[a^h°]{t°[a 
= e°{t°}[a^h°] 
= {t\e)°[a^h°] 




hn 



h°]} 



- if e 

- if e 



a then a[a ^ h]° = h° =a°[a^ h°] 
p then p[a ^ h]° = (3° = P°[a ^ h°] 



Theorem 4 (simulation of the A/i/i-calculus by the A/i-calculus) . 



t — >^ V =^ 3u t° ^ u ^ v° 

Proof. By cases on 7. 
- if 7 = /?' then 

{Xx.u \ v ■ e) 



— if 7 = then 

{fj,a.c I e) 



— if 7 = /i then 

{t I /ix.c) — 

[P\^l^.c"[x 

— c[x <— t] 

- if 7 = 61 then ^S.(t \ 5}° = fiS.[5] t° -^0 t° 

Corollary 3 (call-by-name case). =^ 3u t° ^„ u v° 

Proof. By cases on /?', ^ and /2-rules. 

{Xx.u I u • e) is /^'-reduced in call-by-name without any restriction. It is simu- 
lated in the A/i-calculus by a /3-reduction. The latter is in call-by-name without 
any restriction too. 

{lia.c I e) is /^.-reduced in call-by-name if e ^ flx.c' else it were /i-reduced. 
It is simulated in the A/i-calculus with the help of lemma [21 The latter is in 
call-by-name if e° ^ (3{t) i.e. if e 7^ fix.c' . It is the case by definition [H 

{t I fix.c) is /i-reduced in call-by-name without any restriction. It is simulated 
in the A/i-calculus by a /^-reduction. The latter is in call-by-name without any 
restriction as well. 

Corollary 4 (call-by- value case), 

Proof. By cases on /?', /i and /2-rules. 

{Xx.u \ v ■ e) is /3'-reduced in call-by-value if w is a value. It is simulated in 
the A/x-calculus by a /3-reduction. The latter is in call-by-value if v° is a value. 
It is the case by definition [H 

{lia.c I e) is /i-reduced in call-by-value if e is either a /^.-variable or a context 
of the form v ■ h where u is a value or a /^.-abstraction by the definition of X^j,p,Q . 
It is simulated in the A/x-calculus with the help of lemma El The latter is in 



= v° ■e°{Xx.u°} 
= e°{{Xx.u°)v°} 

e°{u°[x^v°]} 
= e°{u[x ^ v] } 
= {u[x ^ v] I e)° 



= e°{fia.c°} 

A c°[a ^ e°] 
= c[a ^ e]° 

[(3] (Xx.fiS.c^) t° 



call-by-value if v° is a value in a context of the form h° ■ v° i.e. if w is a value in 
a V ■ h context. It is the case by definition [H 

{t I fLx.c) is /i-reduced in call-by-value if t is a value. It is simulated in the 
A/x-calculus by a /9-reduction. The latter is in call-by-value if t° is a value. It is 
the case by definition |4l 

6 Conclusion 

Analysis of the and A^/2-calculi has shown their computational equivalence. 
It holds for undirected evaluations of pure calculi (see theorems [3] and [4]) . This 
result is then easily obtained for call-by-name and call-by-value evaluations (see 
corollaries [U [21 [3] and [4]) . It concerns the simple type system too (see lemmas [3] 
andS]). 

The simulation of the A/x/i-calculus by the A^-calculus is smoother than the 
simulation of the A^-calculus by the A/x/i-calculus. The first is obtained with the 
help of linear reductions whereas the second is obtained with the help of linear 
expansions. 

This work can be extended in three ways. The first consists of proving 
the same results for the call-by- value evaluation of the A/x-calculus defined in 
|Ong and Stewart, 1997| . The second consists of defining CPS translations to 
A-calculus in order to complete jCurien and Herbelin, 2000] . The third consists 
of extending the type system to the other logical constants. 
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